rm(list = ls(all.names = TRUE))
sessionInfo()
## R version 3.2.2 (2015-08-14)
## Platform: x86_64-apple-darwin13.4.0 (64-bit)
## Running under: OS X 10.11.6 (El Capitan)
##
## locale:
## [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
##
## attached base packages:
## [1] stats graphics grDevices utils datasets methods base
##
## loaded via a namespace (and not attached):
## [1] magrittr_1.5 formatR_1.4 tools_3.2.2
## [4] htmltools_0.3.5 yaml_2.1.13 Rcpp_0.12.6
## [7] stringi_1.1.1 rmarkdown_0.9.6.4 knitr_1.13
## [10] stringr_1.0.0 digest_0.6.9 evaluate_0.9
FileExtension <- ".MTS.avi_res.csv"
# working directory
# where this report is
#setwd("./Git/Monrado/Reports/")
# blue will refer to father, red will refer to mother and green to child
colOrderList <- c("blue","red", "green")
ParticipantsList <- c("father", "mother", "child")
After extracting filtered motion motion history with mean on sliding interval (overlapping interval) of 5 frames And after puting this data on a CSV file slideddata.csv
We import this data on python Script with panda module Call_S_Estimator.py This script will compute the synchrony between each dyad of the interaction and of the whole group It will return a csv file for each video SSIXXXX.csv with XXXX the name of the video (1606, BAJE059 etc) that we can import with R with this following function
#print("SSI Files Directory")
SSIlogFilesList <- list.files("../Data/CSV/Synchrony/log/S_estimator", full.name=TRUE)
#SSIlogFilesList
SSIlog <- data.frame(video="Name")
for (file in SSIlogFilesList){
SSIalone <- read.csv(file)
# print(str(SSIalone))
SSIlog <- rbind.fill(SSIlog, SSIalone)}
SSIlog$video <- as.factor(SSIlog$video)
SSIlog <- SSIlog[-which(SSIlog$video=="Name"),]
SSIlog$Interval <- NULL
SSIlog <- rename (SSIlog, c("video" = "family"))
SSIlog <- rename (SSIlog, c("X" = "SSI-interval"))
SSIlog$SSI<-rowSums(SSIlog[, c("SSI_fa_ch", "SSI_mo_ch")], na.rm=T)
# Import data
cutFrames <- read.csv2("../Data/CSV/Cutframes.csv")
# Change the vector in character and cut the string in two parts minutes and second for the 4 time labels ("CutBefore" "CutMiddle1" "CutMiddle2" "CutFinal")
cutFrames$CutBefore <- as.character(cutFrames$CutBefore)
cutFramesCB <- strsplit(cutFrames$CutBefore, split=":")
# Compute the time in minutes from time in minutes and seconds for each video for Cut Before
Cut <- c()
for (i in 1:nrow(cutFrames)){
CutBeforeAlone <- (as.numeric(cutFramesCB[i][[1]][1]) + as.numeric(cutFramesCB[i][[1]][2])/60)
Cut <- c(Cut, CutBeforeAlone)
}
cutFrames$CutBeforeMin <- Cut
# Compute the time in minutes from time in minutes and seconds for each video for Cut CutMiddle1
Cut <- c()
cutFrames$CutMiddle1 <- as.character(cutFrames$CutMiddle1)
cutMiddleSplit <- strsplit(cutFrames$CutMiddle1, split=":")
for (i in 1:nrow(cutFrames)){
CutAlone <- (as.numeric(cutMiddleSplit[i][[1]][1]) + as.numeric(cutMiddleSplit[i][[1]][2])/60)
Cut <- c(Cut, CutAlone)
}
cutFrames$CutMiddle1Min <- Cut
# Compute the time in minutes from time in minutes and seconds for each video for Cut CutMiddle2
Cut <- c()
cutFrames$CutMiddle2 <- as.character(cutFrames$CutMiddle2)
cutMiddleSplit <- strsplit(cutFrames$CutMiddle2, split=":")
for (i in 1:nrow(cutFrames)){
CutAlone <- (as.numeric(cutMiddleSplit[i][[1]][1]) + as.numeric(cutMiddleSplit[i][[1]][2])/60)
Cut <- c(Cut, CutAlone)
}
cutFrames$CutMiddle2Min <- Cut
# Compute the time in minutes from time in minutes and seconds for each video for Cut CutFinal
Cut <- c()
cutFrames$CutFinal <- as.character(cutFrames$CutFinal)
cutSplit <- strsplit(cutFrames$CutFinal, split=":")
for (i in 1:nrow(cutFrames)){
CutAlone <- (as.numeric(cutSplit[i][[1]][1]) + as.numeric(cutSplit[i][[1]][2])/60)
Cut <- c(Cut, CutAlone)
}
cutFrames$CutFinalMin <- Cut
Cut <- c()
#str(SSIlog)
#View(cutFrames)
SSIlog <- merge(SSIlog, cutFrames, by.x="family", by.y="family")
SSIlog$LabelVideo <- rep(NA, nrow(SSIlog))
SSIlog[which(SSIlog$Time_min <= SSIlog$CutBeforeMin),]$LabelVideo <- "Cut"
SSIlog[which(SSIlog$Time_min > SSIlog$CutBeforeMin & SSIlog$Time_min < SSIlog$CutMiddle1Min),]$LabelVideo <- "No Conflict"
SSIlog[which(SSIlog$Time_min >= SSIlog$CutMiddle1Min & SSIlog$Time_min <= SSIlog$CutMiddle2Min),]$LabelVideo <- "Cut"
SSIlog[which(SSIlog$Time_min > SSIlog$CutMiddle2Min & SSIlog$Time_min < SSIlog$CutFinalMin),]$LabelVideo <- "Conflict"
SSIlog[which(SSIlog$Time_min >= SSIlog$CutFinalMin),]$LabelVideo <- "Cut"
str(SSIlog)
## 'data.frame': 1054 obs. of 17 variables:
## $ family : Factor w/ 35 levels "1606","BAJE059",..: 1 1 1 1 1 1 1 1 1 1 ...
## $ SSI-interval : int 0 1 2 3 4 5 6 7 8 9 ...
## $ Time_min : num 0 0.5 1 1.5 2 2.5 3 3.5 4 4.5 ...
## $ SSI_fa_ch : num 0.06097 0.015151 0.008147 0.000207 0.023456 ...
## $ SSI_mo_ch : num NA NA NA NA NA NA NA NA NA NA ...
## $ SSI : num 0.06097 0.015151 0.008147 0.000207 0.023456 ...
## $ CutBefore : chr "00:11" "00:11" "00:11" "00:11" ...
## $ CutMiddle1 : chr "05:30" "05:30" "05:30" "05:30" ...
## $ CutMiddle2 : chr "06:16" "06:16" "06:16" "06:16" ...
## $ CutFinal : chr "16:27" "16:27" "16:27" "16:27" ...
## $ ChildSex : Factor w/ 2 levels "Female","Male": 1 1 1 1 1 1 1 1 1 1 ...
## $ ParentSex : Factor w/ 2 levels "Female","Male": 2 2 2 2 2 2 2 2 2 2 ...
## $ CutBeforeMin : num 0.183 0.183 0.183 0.183 0.183 ...
## $ CutMiddle1Min: num 5.5 5.5 5.5 5.5 5.5 5.5 5.5 5.5 5.5 5.5 ...
## $ CutMiddle2Min: num 6.27 6.27 6.27 6.27 6.27 ...
## $ CutFinalMin : num 16.4 16.4 16.4 16.4 16.4 ...
## $ LabelVideo : chr "Cut" "No Conflict" "No Conflict" "No Conflict" ...
#View(SSIlog)
AUCratios <- c()
Max.SSI.Conflict <- c()
Min.SSI.Conflict <- c()
Max.SSI.No.Conflict <- c()
Min.SSI.No.Conflict <- c()
par(mar=c(4,4,4,3), mfrow=c(1,1))
for (i in unique(SSIlog$family)){
plot(SSIlog[which(SSIlog$family==i),]$Time_min, SSIlog[which(SSIlog$family==i),]$SSI, ylim=c(0, 0.3), main=paste("Synchrony scores in", i, "family"), xlab = "Time (minute)", ylab="Synchrony score", lwd=2, type="l", col=rainbow(2)[1], cex.axis=0.7, xaxp=c(0,length(SSIlog[which(SSIlog$family==i),]$Time_min), length(SSIlog[which(SSIlog$family==i),]$Time_min)))
print(paste ("Minimum synchrony in No conflict condition is", min(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$SSI)))
print(paste("Maximum synchrony in No conflict condition is", max(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$SSI)))
print(paste("Minimum synchrony in Conflict condition is", min(SSIlog[which(SSIlog$family==i& SSIlog$LabelVideo=="Conflict"),]$SSI)))
print(paste("Maximum synchrony in Conflict condition is", max(SSIlog[which(SSIlog$family==i& SSIlog$LabelVideo=="Conflict"),]$SSI)))
Min.SSI.No.Conflict <- c(Min.SSI.No.Conflict, min(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$SSI))
Max.SSI.No.Conflict <- c(Max.SSI.No.Conflict, max(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$SSI))
Min.SSI.Conflict <- c(Min.SSI.Conflict, min(SSIlog[which(SSIlog$family==i& SSIlog$LabelVideo=="Conflict"),]$SSI))
Max.SSI.Conflict <- c(Max.SSI.Conflict, max(SSIlog[which(SSIlog$family==i& SSIlog$LabelVideo=="Conflict"),]$SSI))
#Compute AUC
# No conflict
AUCnoconflict <-trapz(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$Time_min, SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$SSI)
print(paste ("AUC of synchrony score in no Conflict condition is", AUCnoconflict))
# hist(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$SSI)
Time.minimum <- min(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$Time_min)
Time.max <- max(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="No Conflict"),]$Time_min)
AUCnoconflictByMinute <- AUCnoconflict/(Time.max-Time.minimum)
print(paste("AUC of synchrony score by Minute in no conflict condition is", AUCnoconflictByMinute))
# Conflict
AUCconflict <-trapz(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="Conflict"),]$Time_min, SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="Conflict"),]$SSI)
print(paste ("AUC of synchrony score in Conflict condition is", AUCconflict))
# hist(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="Conflict"),]$SSI)
Time.minimum <- min(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="Conflict"),]$Time_min)
Time.max <- max(SSIlog[which(SSIlog$family==i & SSIlog$LabelVideo=="Conflict"),]$Time_min)
AUCconflictByMinute <- AUCconflict/(Time.max-Time.minimum)
print(paste("AUC of synchrony score in Conflict by minute is", AUCconflictByMinute))
AUCbyMinuteRatio <- AUCconflictByMinute/AUCnoconflictByMinute
print(paste("AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is", AUCbyMinuteRatio))
AUCratios <-c(AUCratios, AUCbyMinuteRatio)}
## [1] "Minimum synchrony in No conflict condition is 0.00020723219929"
## [1] "Maximum synchrony in No conflict condition is 0.162641427036"
## [1] "Minimum synchrony in Conflict condition is 2.27330022941e-05"
## [1] "Maximum synchrony in Conflict condition is 0.196229925583"
## [1] "AUC of synchrony score in no Conflict condition is 0.16966785792937"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0377039684287489"
## [1] "AUC of synchrony score in Conflict condition is 0.436947015248242"
## [1] "AUC of synchrony score in Conflict by minute is 0.0459944226577097"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.21988280211479"
## [1] "Minimum synchrony in No conflict condition is 3.91224496984e-05"
## [1] "Maximum synchrony in No conflict condition is 0.111070858337"
## [1] "Minimum synchrony in Conflict condition is 0.000171230456478"
## [1] "Maximum synchrony in Conflict condition is 0.283594192505"
## [1] "AUC of synchrony score in no Conflict condition is 0.116015420406248"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0257812045347218"
## [1] "AUC of synchrony score in Conflict condition is 0.583808296557597"
## [1] "AUC of synchrony score in Conflict by minute is 0.0583808296557597"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 2.26447253762457"
## [1] "Minimum synchrony in No conflict condition is 6.28762575897e-05"
## [1] "Maximum synchrony in No conflict condition is 0.0366834349183"
## [1] "Minimum synchrony in Conflict condition is 9.89174719891e-05"
## [1] "Maximum synchrony in Conflict condition is 0.196797853623"
## [1] "AUC of synchrony score in no Conflict condition is 0.0456773938126104"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0101505319583579"
## [1] "AUC of synchrony score in Conflict condition is 0.416424713128804"
## [1] "AUC of synchrony score in Conflict by minute is 0.0462694125698671"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 4.55832391442"
## [1] "Minimum synchrony in No conflict condition is 4.74519790791e-05"
## [1] "Maximum synchrony in No conflict condition is 0.255074329696"
## [1] "Minimum synchrony in Conflict condition is 0.000115994006333"
## [1] "Maximum synchrony in Conflict condition is 0.288862141322"
## [1] "AUC of synchrony score in no Conflict condition is 0.28232675788508"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0627392795300179"
## [1] "AUC of synchrony score in Conflict condition is 0.389086258725922"
## [1] "AUC of synchrony score in Conflict by minute is 0.0432318065251025"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.689070815746586"
## [1] "Minimum synchrony in No conflict condition is 0.0243316991252"
## [1] "Maximum synchrony in No conflict condition is 0.0932572497472"
## [1] "Minimum synchrony in Conflict condition is 0.00237081996945"
## [1] "Maximum synchrony in Conflict condition is 0.23482098079"
## [1] "AUC of synchrony score in no Conflict condition is 0.1989853008936"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0497463252234"
## [1] "AUC of synchrony score in Conflict condition is 0.558372646389115"
## [1] "AUC of synchrony score in Conflict by minute is 0.0620414051543461"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.24715554115267"
## [1] "Minimum synchrony in No conflict condition is 0.000100830792908"
## [1] "Maximum synchrony in No conflict condition is 0.073888891093"
## [1] "Minimum synchrony in Conflict condition is 7.18268950624e-05"
## [1] "Maximum synchrony in Conflict condition is 0.0901475828251"
## [1] "AUC of synchrony score in no Conflict condition is 0.110945685279709"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0246545967288242"
## [1] "AUC of synchrony score in Conflict condition is 0.206796305666991"
## [1] "AUC of synchrony score in Conflict by minute is 0.0243289771372931"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.986792743149986"
## [1] "Minimum synchrony in No conflict condition is 1.81882928162e-05"
## [1] "Maximum synchrony in No conflict condition is 0.11575092285"
## [1] "Minimum synchrony in Conflict condition is 0.00221502611497"
## [1] "Maximum synchrony in Conflict condition is 0.214274213819"
## [1] "AUC of synchrony score in no Conflict condition is 0.15706187315563"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0349026384790289"
## [1] "AUC of synchrony score in Conflict condition is 0.49178546904271"
## [1] "AUC of synchrony score in Conflict by minute is 0.05176689147818"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.4831798893738"
## [1] "Minimum synchrony in No conflict condition is 3.370852788e-05"
## [1] "Maximum synchrony in No conflict condition is 0.171920231215"
## [1] "Minimum synchrony in Conflict condition is 0.000689975133604"
## [1] "Maximum synchrony in Conflict condition is 0.15826268533"
## [1] "AUC of synchrony score in no Conflict condition is 0.191993708803804"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0426652686230674"
## [1] "AUC of synchrony score in Conflict condition is 0.431812525401193"
## [1] "AUC of synchrony score in Conflict by minute is 0.0479791694890214"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.12454863258686"
## [1] "Minimum synchrony in No conflict condition is 0.000346040615236"
## [1] "Maximum synchrony in No conflict condition is 0.0733078310721"
## [1] "Minimum synchrony in Conflict condition is 2.26846188593e-05"
## [1] "Maximum synchrony in Conflict condition is 0.169792577552"
## [1] "AUC of synchrony score in no Conflict condition is 0.095080446422783"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0211289880939518"
## [1] "AUC of synchrony score in Conflict condition is 0.283593867919292"
## [1] "AUC of synchrony score in Conflict by minute is 0.0283593867919292"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.34220279105781"
## [1] "Minimum synchrony in No conflict condition is 0.00112080671499"
## [1] "Maximum synchrony in No conflict condition is 0.13457144619"
## [1] "Minimum synchrony in Conflict condition is 0.000406039769406"
## [1] "Maximum synchrony in Conflict condition is 0.120967204097"
## [1] "AUC of synchrony score in no Conflict condition is 0.176885897237685"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.03930797716393"
## [1] "AUC of synchrony score in Conflict condition is 0.277889216120201"
## [1] "AUC of synchrony score in Conflict by minute is 0.0292514964337054"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.744161835439024"
## [1] "Minimum synchrony in No conflict condition is 1.85788540922e-05"
## [1] "Maximum synchrony in No conflict condition is 0.211509626897"
## [1] "Minimum synchrony in Conflict condition is 0.00225188492452"
## [1] "Maximum synchrony in Conflict condition is 0.216672202487"
## [1] "AUC of synchrony score in no Conflict condition is 0.212693810467176"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.047265291214928"
## [1] "AUC of synchrony score in Conflict condition is 0.46446981882463"
## [1] "AUC of synchrony score in Conflict by minute is 0.0516077576471811"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.0918743187788"
## [1] "Minimum synchrony in No conflict condition is 0.000357689795769"
## [1] "Maximum synchrony in No conflict condition is 0.121092339891"
## [1] "Minimum synchrony in Conflict condition is 0.000647252492938"
## [1] "Maximum synchrony in Conflict condition is 0.158087219594"
## [1] "AUC of synchrony score in no Conflict condition is 0.087484903179031"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0194410895953402"
## [1] "AUC of synchrony score in Conflict condition is 0.542956673231534"
## [1] "AUC of synchrony score in Conflict by minute is 0.0603285192479482"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 3.10314496273955"
## [1] "Minimum synchrony in No conflict condition is 0.00082628140385"
## [1] "Maximum synchrony in No conflict condition is 0.161167996464"
## [1] "Minimum synchrony in Conflict condition is 0.000114763100909"
## [1] "Maximum synchrony in Conflict condition is 0.291958679445"
## [1] "AUC of synchrony score in no Conflict condition is 0.29598772206624"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0657750493480533"
## [1] "AUC of synchrony score in Conflict condition is 0.654164740683496"
## [1] "AUC of synchrony score in Conflict by minute is 0.0769605577274701"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.17005701235172"
## [1] "Minimum synchrony in No conflict condition is 0.000433217722003"
## [1] "Maximum synchrony in No conflict condition is 0.101649149753"
## [1] "Minimum synchrony in Conflict condition is 6.15190131059e-08"
## [1] "Maximum synchrony in Conflict condition is 0.249178556122"
## [1] "AUC of synchrony score in no Conflict condition is 0.119417400496912"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0238834800993823"
## [1] "AUC of synchrony score in Conflict condition is 0.63104586316634"
## [1] "AUC of synchrony score in Conflict by minute is 0.063104586316634"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 2.64218556316113"
## [1] "Minimum synchrony in No conflict condition is 0.000225989581963"
## [1] "Maximum synchrony in No conflict condition is 0.0939335055613"
## [1] "Minimum synchrony in Conflict condition is 0.00337751015232"
## [1] "Maximum synchrony in Conflict condition is 0.205810500468"
## [1] "AUC of synchrony score in no Conflict condition is 0.144488560062803"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0321085689028451"
## [1] "AUC of synchrony score in Conflict condition is 0.460219275670171"
## [1] "AUC of synchrony score in Conflict by minute is 0.0511354750744634"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.59258032424897"
## [1] "Minimum synchrony in No conflict condition is 0.000149138397097"
## [1] "Maximum synchrony in No conflict condition is 0.134418063989"
## [1] "Minimum synchrony in Conflict condition is 0.000890310987045"
## [1] "Maximum synchrony in Conflict condition is 0.29947958979"
## [1] "AUC of synchrony score in no Conflict condition is 0.201322019976264"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0503305049940659"
## [1] "AUC of synchrony score in Conflict condition is 0.74725698033122"
## [1] "AUC of synchrony score in Conflict by minute is 0.08791258592132"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.74670581850282"
## [1] "Minimum synchrony in No conflict condition is 0.000157639011598"
## [1] "Maximum synchrony in No conflict condition is 0.0778500356114"
## [1] "Minimum synchrony in Conflict condition is 1.44480522229e-05"
## [1] "Maximum synchrony in Conflict condition is 0.12534744295"
## [1] "AUC of synchrony score in no Conflict condition is 0.164630102611741"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0365844672470537"
## [1] "AUC of synchrony score in Conflict condition is 0.252110865185128"
## [1] "AUC of synchrony score in Conflict by minute is 0.0265379858089609"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.725389429064274"
## [1] "Minimum synchrony in No conflict condition is 7.89646772482e-05"
## [1] "Maximum synchrony in No conflict condition is 0.0934437592177"
## [1] "Minimum synchrony in Conflict condition is 1.61793844508e-05"
## [1] "Maximum synchrony in Conflict condition is 0.166982759111"
## [1] "AUC of synchrony score in no Conflict condition is 0.0836793258448089"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0185954057432909"
## [1] "AUC of synchrony score in Conflict condition is 0.461528749353694"
## [1] "AUC of synchrony score in Conflict by minute is 0.0512809721504105"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 2.75772267937269"
## [1] "Minimum synchrony in No conflict condition is 0.000150869165166"
## [1] "Maximum synchrony in No conflict condition is 0.137746488791"
## [1] "Minimum synchrony in Conflict condition is 3.12088845568e-05"
## [1] "Maximum synchrony in Conflict condition is 0.180805367101"
## [1] "AUC of synchrony score in no Conflict condition is 0.140706423238676"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0312680940530391"
## [1] "AUC of synchrony score in Conflict condition is 0.386861502302805"
## [1] "AUC of synchrony score in Conflict by minute is 0.0455131179179771"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.45557698018864"
## [1] "Minimum synchrony in No conflict condition is 0.000972786771489"
## [1] "Maximum synchrony in No conflict condition is 0.126824043684"
## [1] "Minimum synchrony in Conflict condition is 8.72473957747e-07"
## [1] "Maximum synchrony in Conflict condition is 0.246780167452"
## [1] "AUC of synchrony score in no Conflict condition is 0.131235071591614"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0262470143183229"
## [1] "AUC of synchrony score in Conflict condition is 0.339474457424007"
## [1] "AUC of synchrony score in Conflict by minute is 0.0452632609898676"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.72451085067872"
## [1] "Minimum synchrony in No conflict condition is 0.00200613874381"
## [1] "Maximum synchrony in No conflict condition is 0.152166904067"
## [1] "Minimum synchrony in Conflict condition is 3.68902693213e-05"
## [1] "Maximum synchrony in Conflict condition is 0.0576371314738"
## [1] "AUC of synchrony score in no Conflict condition is 0.218216094144413"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0545540235361031"
## [1] "AUC of synchrony score in Conflict condition is 0.199512558379676"
## [1] "AUC of synchrony score in Conflict by minute is 0.0221680620421862"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.406350633835756"
## [1] "Minimum synchrony in No conflict condition is 0.000213377012102"
## [1] "Maximum synchrony in No conflict condition is 0.118004043517"
## [1] "Minimum synchrony in Conflict condition is 0.00010141809024"
## [1] "Maximum synchrony in Conflict condition is 0.139157612746"
## [1] "AUC of synchrony score in no Conflict condition is 0.208483942682034"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0416967885364067"
## [1] "AUC of synchrony score in Conflict condition is 0.322382830981835"
## [1] "AUC of synchrony score in Conflict by minute is 0.0307031267601747"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.736342721775009"
## [1] "Minimum synchrony in No conflict condition is 0.00448403459167"
## [1] "Maximum synchrony in No conflict condition is 0.327005369357"
## [1] "Minimum synchrony in Conflict condition is 0.000542149998228"
## [1] "Maximum synchrony in Conflict condition is 0.174004226812"
## [1] "AUC of synchrony score in no Conflict condition is 0.311950538243985"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0779876345609963"
## [1] "AUC of synchrony score in Conflict condition is 0.351473869174739"
## [1] "AUC of synchrony score in Conflict by minute is 0.0390526521305266"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.500754412547061"
## [1] "Minimum synchrony in No conflict condition is 6.6003670196e-08"
## [1] "Maximum synchrony in No conflict condition is 0.318570720452"
## [1] "Minimum synchrony in Conflict condition is 0.00122202706246"
## [1] "Maximum synchrony in Conflict condition is 0.17456950152"
## [1] "AUC of synchrony score in no Conflict condition is 0.37007209354291"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0822382430095356"
## [1] "AUC of synchrony score in Conflict condition is 0.41150754868299"
## [1] "AUC of synchrony score in Conflict by minute is 0.0748195543059982"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.909790282087165"
## [1] "Minimum synchrony in No conflict condition is 0.000102161036203"
## [1] "Maximum synchrony in No conflict condition is 0.143483228266"
## [1] "Minimum synchrony in Conflict condition is 0.000133664664656"
## [1] "Maximum synchrony in Conflict condition is 0.163926022149"
## [1] "AUC of synchrony score in no Conflict condition is 0.146454433589111"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0325454296864691"
## [1] "AUC of synchrony score in Conflict condition is 0.231610730977487"
## [1] "AUC of synchrony score in Conflict by minute is 0.0272483212914691"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.83723956186689"
## [1] "Minimum synchrony in No conflict condition is 0.000248036969103"
## [1] "Maximum synchrony in No conflict condition is 0.155140864011"
## [1] "Minimum synchrony in Conflict condition is 0.000574595277048"
## [1] "Maximum synchrony in Conflict condition is 0.112300658709"
## [1] "AUC of synchrony score in no Conflict condition is 0.366386577639788"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0563671657907366"
## [1] "AUC of synchrony score in Conflict condition is 0.194237053170232"
## [1] "AUC of synchrony score in Conflict by minute is 0.0277481504528903"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.492275069424378"
## [1] "Minimum synchrony in No conflict condition is 0.00163352069499"
## [1] "Maximum synchrony in No conflict condition is 0.0887053441896"
## [1] "Minimum synchrony in Conflict condition is 2.81298510284e-05"
## [1] "Maximum synchrony in Conflict condition is 0.0942407102477"
## [1] "AUC of synchrony score in no Conflict condition is 0.12358776765932"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0274639483687378"
## [1] "AUC of synchrony score in Conflict condition is 0.146860503770938"
## [1] "AUC of synchrony score in Conflict by minute is 0.0183575629713673"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.668424027197186"
## [1] "Minimum synchrony in No conflict condition is 0.00153626571319"
## [1] "Maximum synchrony in No conflict condition is 0.111607083981"
## [1] "Minimum synchrony in Conflict condition is 0.000100003879974"
## [1] "Maximum synchrony in Conflict condition is 0.13310479091"
## [1] "AUC of synchrony score in no Conflict condition is 0.0985021154285125"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0246255288571281"
## [1] "AUC of synchrony score in Conflict condition is 0.214871980149183"
## [1] "AUC of synchrony score in Conflict by minute is 0.0238746644610203"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.969508699672435"
## [1] "Minimum synchrony in No conflict condition is 0.000477255036768"
## [1] "Maximum synchrony in No conflict condition is 0.172009824639"
## [1] "Minimum synchrony in Conflict condition is 0.000174590214324"
## [1] "Maximum synchrony in Conflict condition is 0.129758929753"
## [1] "AUC of synchrony score in no Conflict condition is 0.218174497812148"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0484832217360329"
## [1] "AUC of synchrony score in Conflict condition is 0.382330497669839"
## [1] "AUC of synchrony score in Conflict by minute is 0.0424811664077599"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.876203455270543"
## [1] "Minimum synchrony in No conflict condition is 0.00134694959214"
## [1] "Maximum synchrony in No conflict condition is 0.0818784291128"
## [1] "Minimum synchrony in Conflict condition is 1.03219948144e-08"
## [1] "Maximum synchrony in Conflict condition is 0.165525486434"
## [1] "AUC of synchrony score in no Conflict condition is 0.152651875672785"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0339226390383967"
## [1] "AUC of synchrony score in Conflict condition is 0.42535858878253"
## [1] "AUC of synchrony score in Conflict by minute is 0.0447745882928978"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.31990286021727"
## [1] "Minimum synchrony in No conflict condition is 0.00133517507141"
## [1] "Maximum synchrony in No conflict condition is 0.0756887251868"
## [1] "Minimum synchrony in Conflict condition is 6.72311730812e-05"
## [1] "Maximum synchrony in Conflict condition is 0.0666969356603"
## [1] "AUC of synchrony score in no Conflict condition is 0.115232029276655"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0256071176170344"
## [1] "AUC of synchrony score in Conflict condition is 0.108056406391335"
## [1] "AUC of synchrony score in Conflict by minute is 0.012006267376815"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.46886446012292"
## [1] "Minimum synchrony in No conflict condition is 5.88317922213e-05"
## [1] "Maximum synchrony in No conflict condition is 0.155525318562"
## [1] "Minimum synchrony in Conflict condition is 0.000686980323324"
## [1] "Maximum synchrony in Conflict condition is 0.106263468973"
## [1] "AUC of synchrony score in no Conflict condition is 0.265077388800652"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0589060864001448"
## [1] "AUC of synchrony score in Conflict condition is 0.293422881128257"
## [1] "AUC of synchrony score in Conflict by minute is 0.0345203389562655"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.58602329684188"
## [1] "Minimum synchrony in No conflict condition is 0.00481174926694"
## [1] "Maximum synchrony in No conflict condition is 0.0785141822773"
## [1] "Minimum synchrony in Conflict condition is 0.000253947604085"
## [1] "Maximum synchrony in Conflict condition is 0.142678642828"
## [1] "AUC of synchrony score in no Conflict condition is 0.15972712174368"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.031945424348736"
## [1] "AUC of synchrony score in Conflict condition is 0.337975201089102"
## [1] "AUC of synchrony score in Conflict by minute is 0.0355763369567476"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 1.11365986466088"
## [1] "Minimum synchrony in No conflict condition is 0.00108237727779"
## [1] "Maximum synchrony in No conflict condition is 0.121824368327"
## [1] "Minimum synchrony in Conflict condition is 0.000107117659305"
## [1] "Maximum synchrony in Conflict condition is 0.090693902849"
## [1] "AUC of synchrony score in no Conflict condition is 0.135416233477425"
## [1] "AUC of synchrony score by Minute in no conflict condition is 0.0338540583693562"
## [1] "AUC of synchrony score in Conflict condition is 0.174702175248822"
## [1] "AUC of synchrony score in Conflict by minute is 0.0194113528054247"
## [1] "AUC of synchrony score by minute Ratio (ie AUCconflictByMinute/AUCnoconflictByMinute) is 0.573383332469094"
AUCratios
## [1] 1.2198828 2.2644725 4.5583239 0.6890708 1.2471555 0.9867927 1.4831799
## [8] 1.1245486 1.3422028 0.7441618 1.0918743 3.1031450 1.1700570 2.6421856
## [15] 1.5925803 1.7467058 0.7253894 2.7577227 1.4555770 1.7245109 0.4063506
## [22] 0.7363427 0.5007544 0.9097903 0.8372396 0.4922751 0.6684240 0.9695087
## [29] 0.8762035 1.3199029 0.4688645 0.5860233 1.1136599 0.5733833
summary(AUCratios)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.4064 0.7281 1.1030 1.2980 1.4760 4.5580
hist(AUCratios)
print("There is not much difference with the null hypothesis which is one.")
## [1] "There is not much difference with the null hypothesis which is one."
str(Min.SSI.No.Conflict)
## num [1:34] 2.07e-04 3.91e-05 6.29e-05 4.75e-05 2.43e-02 ...
summary(Min.SSI.No.Conflict)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 6.600e-08 8.443e-05 2.370e-04 1.442e-03 1.111e-03 2.433e-02
hist(Min.SSI.No.Conflict)
str(Min.SSI.Conflict)
## num [1:34] 2.27e-05 1.71e-04 9.89e-05 1.16e-04 2.37e-03 ...
summary(Min.SSI.Conflict)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.000e-08 3.263e-05 1.154e-04 5.164e-04 6.291e-04 3.378e-03
hist(Min.SSI.Conflict)
str(Max.SSI.No.Conflict)
## num [1:34] 0.1626 0.1111 0.0367 0.2551 0.0933 ...
summary(Max.SSI.No.Conflict)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.03668 0.09330 0.12150 0.13490 0.15540 0.32700
hist(Max.SSI.No.Conflict)
str(Max.SSI.Conflict)
## num [1:34] 0.196 0.284 0.197 0.289 0.235 ...
summary(Max.SSI.Conflict)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.05764 0.12650 0.16630 0.17190 0.21220 0.29950
hist(Max.SSI.Conflict)
print("There is no difference between the minimum synchrony scores in the two conditions. The maximum of the synchrony score is bigger in the condition conflict than in the condition no Conflict, This could be explain by a random effect since, the time period is bigger in the confict period")
## [1] "There is no difference between the minimum synchrony scores in the two conditions. The maximum of the synchrony score is bigger in the condition conflict than in the condition no Conflict, This could be explain by a random effect since, the time period is bigger in the confict period"